      REAL*8 ECCGRS, ECCXST, OMECCX
      COMMON /CCFDGEO/ ECCGRS, ECCXST , OMECCX
